CD Ware Multimedia 1994 November/Cd Ware (Nro. 2) - Epimundo.iso/DOS/ED/PCKEY.ZIP/KEYSUP.SCR

Text File | 1993-05-25 | 19.6 KB | 1,131 lines

:keysup.scr

if memory 1 = 3 goto cont_ukl
memory 1 = 3
memory 2 = 0

:cont_ukl
if memory 2 > 0 goto repeat_lesson2

goto start_lesson
:repeat_lesson
bkey r
bkey '

:start_lesson
start 2
clear 15

cursor 23 19
print 'Press any key to start lesson 3.
wait -
clear 19 19

clear 15
cursor 0 15
print 'Now we shall learn about the keys on the row above the HOME keys.
hkey a
fkey q
cursor 2 17
print 'Your left little finger over the A key, also presses the Q key. You move your
cursor 0 18
print 'finger forwards and slightly to the left, press Q and return your finger resting
cursor 0 19
print 'over A.

cursor 0 21
print 'Try moving your left little finger over the Q key, press it and return your
cursor 0 22
print 'finger back resting over the A key.

:wait_for_q
wait -
if key ! Q if key ! q goto wait_for_q

fkey a
hkey q

print ' Good. Now press the A key.

:wait_for_a
wait -
if key ! A if key ! a goto wait_for_a

bkey q
hkey a

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys A and Q.

clear 18
cursor 19 18
print 'aaaa qqqq aaaa qqqq aaqq aaqq aqaq aqaq
cursor 0 21
print 'Remember you use your left little finger to press Q.
fkey a
hkey q
script - waitspc
bkey a
bkey q
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys S and W.
hkey s
fkey w
cursor 2 17
print 'Your left ring finger over the S key, also presses the W key. You move your
cursor 0 18
print 'finger forwards and slightly to the left, press W and return your finger resting
cursor 0 19
print 'over S.

cursor 0 21
print 'Try moving your left ring finger over the W key, press it and return your
cursor 0 22
print 'finger back resting over the S key.

:wait_for_w
wait -
if key ! W if key ! w goto wait_for_w

fkey s
hkey w

print ' Good. Now press the S key.

:wait_for_s
wait -
if key ! S if key ! s goto wait_for_s

bkey w
hkey s

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys S and W.

clear 18
cursor 19 18
print 'ssss wwww ssss wwww ssww ssww swsw swsw
cursor 0 21
print 'Remember you use your left ring finger to press W.
fkey s
hkey w
script - waitspc
bkey s
bkey w
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys D and E.
hkey d
fkey e
cursor 2 17
print 'Your left middle finger over the D key, also presses the E key. You move your
cursor 0 18
print 'finger forwards and slightly to the left, press E and return your finger resting
cursor 0 19
print 'over D.

cursor 0 21
print 'Try moving your left middle finger over the E key, press it and return your
cursor 0 22
print 'finger back resting over the D key.

:wait_for_e
wait -
if key ! E if key ! e goto wait_for_e

fkey d
hkey e

print ' Good. Now press the D key.

:wait_for_d
wait -
if key ! D if key ! d goto wait_for_d

bkey e
hkey d

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys D and E.

clear 18
cursor 19 18
print 'dddd eeee dddd eeee ddee ddee dede dede
cursor 0 21
print 'Remember you use your left middle finger to press E.
fkey d
hkey e
script - waitspc
bkey d
bkey e
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys F and R.
hkey f
fkey r
cursor 2 17
print 'Your left index finger over the F key, also presses the R key. You move your
cursor 0 18
print 'finger forwards and slightly to the left, press R and return your finger resting
cursor 0 19
print 'over F.

cursor 0 21
print 'Try moving your left index finger over the R key, press it and return your
cursor 0 22
print 'finger back resting over the F key.

:wait_for_r
wait -
if key ! R if key ! r goto wait_for_r

fkey f
hkey r

print ' Good. Now press the F key.

:wait_for_f
wait -
if key ! F if key ! f goto wait_for_f

bkey r
hkey f

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys F and R.

clear 18
cursor 19 18
print 'ffff rrrr ffff rrrr ffrr ffrr frfr frfr
cursor 0 21
print 'Remember you use your left index finger to press R.
fkey f
hkey r
script - waitspc
bkey f
bkey r
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys J and U.
hkey j
fkey u
cursor 2 17
print 'Your right index finger over the J key, also presses the U key. You move your
cursor 0 18
print 'finger forwards and slightly to the right, press U and return your finger
cursor 0 19
print 'resting over J.

cursor 0 21
print 'Try moving your right index finger over the U key, press it and return your
cursor 0 22
print 'finger back resting over the J key.

:wait_for_u
wait -
if key ! U if key ! u goto wait_for_u

fkey j
hkey u

print ' Good. Now press the J key.

:wait_for_j
wait -
if key ! J if key ! j goto wait_for_j

bkey u
hkey j

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys J and U.

clear 18
cursor 19 18
print 'jjjj uuuu jjjj uuuu jjuu jjuu juju juju
cursor 0 21
print 'Remember you use your right index finger to press U.
fkey j
hkey u
script - waitspc
bkey j
bkey u
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys K and I.
hkey k
fkey i
cursor 2 17
print 'Your right middle finger over the K key, also presses the I key. You move your
cursor 0 18
print 'finger forwards and slightly to the right, press I and return your finger
cursor 0 19
print 'resting over K.

cursor 0 21
print 'Try moving your right middle finger over the I key, press it and return your
cursor 0 22
print 'finger back resting over the K key.

:wait_for_i
wait -
if key ! I if key ! i goto wait_for_i

fkey k
hkey i

print ' Good. Now press the K key.

:wait_for_k
wait -
if key ! K if key ! k goto wait_for_k

bkey i
hkey k

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys K and I.

clear 18
cursor 19 18
print 'kkkk iiii kkkk iiii kkii kkii kiki kiki
cursor 0 21
print 'Remember you use your right middle finger to press I.
fkey k
hkey i
script - waitspc
bkey k
bkey i
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys L and O.
hkey l
fkey o
cursor 2 17
print 'Your right ring finger over the L key, also presses the O key. You move your
cursor 0 18
print 'finger forwards and slightly to the right, press O and return your finger
cursor 0 19
print 'resting over L.

cursor 0 21
print 'Try moving your right ring finger over the O key, press it and return your
cursor 0 22
print 'finger back resting over the L key.

:wait_for_o
wait -
if key ! O if key ! o goto wait_for_o

fkey l
hkey o

print ' Good. Now press the L key.

:wait_for_l
wait -
if key ! L if key ! l goto wait_for_l

bkey o
hkey l

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys L and O.

clear 18
cursor 19 18
print 'llll oooo llll oooo lloo lloo lolo lolo
cursor 0 21
print 'Remember you use your right ring finger to press O.
fkey l
hkey o
script - waitspc
bkey l
bkey o
script - dotest1

clear 15
cursor 0 15
print 'Now we shall learn about the keys ; and P.
hkey ;
fkey p
cursor 2 17
print 'Your right little finger over the ; key, also presses the P key. You move your
cursor 0 18
print 'finger forwards and slightly to the right, press P and return your finger
cursor 0 19
print 'resting over ;.

cursor 0 21
print 'Try moving your right little finger over the P key, press it and return your
cursor 0 22
print 'finger back resting over the ; key.

:wait_for_p
wait -
if key ! P if key ! p goto wait_for_p

fkey ;
hkey p

print ' Good. Now press the ; key.

:wait_for_;
wait -
if key ! ; goto wait_for_;

bkey p
hkey ;

print ' Good.
script - waitspc

clear 15
clear 15
cursor 0 15
print 'Now try a short test using the keys ; and P.

clear 18
cursor 19 18
print ';;;; pppp ;;;; pppp ;;pp ;;pp ;p;p ;p;p
cursor 0 21
print 'Remember you use your right little finger to press P.
fkey ;
hkey p
script - waitspc
bkey ;
bkey p
script - dotest1

script - progress

clear 15
cursor 0 15
print 'Now we will practice with the keys you have just learnt and the HOME keys.

clear 18
cursor 9 18
print 'rrrr ffff uuuu jjjj ffff rrrr jjjj uuuu ffjj rruu ffrr jjuu
cursor 0 21
print 'Remember your index fingers rest over F and J.
hkey f
fkey g
fkey r
fkey u
fkey h
hkey j
script - waitspc
bkey f
bkey g
bkey r
bkey h
bkey u
bkey j
script - dotest2

cursor 9 18
print 'rrrr ffgg hhjj uuuu rruu ffjj uurr ujuj rfrf ruru rjrj fufu
script - dotest2

cursor 9 18
print 'frug gruf rugh fugh fruj jruf jfhg jrfu fhgu jghr hgfj ugrh
script - dotest2

script - progress

clear 18
cursor 9 18
print 'eeee ddkk iiii eeii ddii kkee iiee ddii ddee eeei iiie eiie
cursor 0 21
print 'Remember your middle fingers rest over D and K.
hkey d
fkey e
fkey i
hkey k
script - waitspc
bkey d
bkey e
bkey i
bkey k
script - dotest2

cursor 9 18
print 'iiie ieee eeei diii kkdd ddee eeii iikk deik kied keed diik
script - dotest2

cursor 9 18
print 'kiki dede deki kide dike kedi dkii kdee ikke diik eddi keed
script - dotest2

script - progress

clear 18
cursor 9 18
print 'wwww ssll oooo wwoo ssoo llww ooww ssoo ssww wwwo ooow woow
cursor 0 21
print 'Remember your ring fingers rest over S and L.
hkey s
fkey w
fkey o
hkey l
script - waitspc
bkey s
bkey w
bkey o
bkey l
script - dotest2

cursor 9 18
print 'ooow owww wwwo sooo llss ssww wwoo ooll swol lows lwws sool
script - dotest2

cursor 9 18
print 'lolo swsw swlo losw solw lwso sloo lsww ollw sool wsso lwws
script - dotest2

script - progress

clear 18
cursor 9 18
print 'qqqq aa;; pppp qqpp aapp ;;qq ppqq aapp aaqq qqqp pppq qppq
cursor 0 21
print 'Remember your little fingers rest over A and ;.
hkey a
fkey q
fkey p
hkey ;
script - waitspc
bkey a
bkey q
bkey p
bkey ;
script - dotest2

cursor 9 18
print 'pppq pqqq qqqp appp ;;aa aaqq qqpp pp;; aqp; ;pqa ;qqa app;
script - dotest2

cursor 9 18
print ';p;p aqaq aq;p ;paq ap;q ;qap a;pp ;aqq p;;q app; qaap ;qqa
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will practice with Q W E R U I O P and A S D F G H J K L ;

clear 18
cursor 9 18
print 'aq sw de fr ju ki lo ;p aqaq swsw dede frfr juju kiki lolo ;p;p
cursor 0 21
print 'Remember your fingers rest on the HOME keys.
hkey a
fkey q
hkey s
fkey w
hkey d
fkey e
hkey f
fkey r
fkey g
fkey h
fkey u
hkey j
fkey i
hkey k
fkey o
hkey l
fkey p
hkey ;
script - waitspc
bkey a
bkey q
bkey s
bkey w
bkey d
bkey e
bkey f
bkey r
bkey g
bkey h
bkey u

bkey j
bkey i
bkey k
bkey o
bkey l
bkey p
bkey ;
script - dotest2

clear 18 18
cursor 9 18
print 'a w f h d r f h p j i l s e e g k r j d ; s q w j g a r j g
script - dotest2

clear 18 18
cursor 9 18
print 'aqa rfr kii hur gig jjr frf wse dpl uou rwh gsa hfh qsq eek
script - dotest2

clear 18 18
cursor 9 18
print 'aqua keep flag rope deep feed pool deer hill swap door loop
script - dotest2

clear 18 18
cursor 9 18
print 'drool share ware swipe prior wheel shape where freed ghouls
script - dotest2

clear 18 18
cursor 9 18
print 'a red hooded wolf all hairless drools for a dish of kippers;
script - dotest2

script - progress

script - repeat
if key = R goto repeat_lesson
if key = r goto repeat_lesson

memory 2 = 1

clear
cursor 51 7
print '3.
script - save
if key = S goto exit
if key = s goto exit

clear
keyboard

:repeat_lesson2
if memory 2 > 1 goto exit
clear 15
start 2
cursor 23 19
print 'Press any key to start lesson 4.
wait -
clear 19 19

fkey f
hkey t
hkey y
fkey j
cursor 2 16
print 'The T and Y keys are a little bit more difficult to get used to. Like the
cursor 0 17
print 'G and H keys, T and Y are pressed by your index fingers.

cursor 2 18
print 'Your left index finger moves from the F key in a rightward diagonal direction
cursor 0 19
print 'over T and your right index finger moves in a leftward diagonal direction over
cursor 0 20
print 'the Y key.

cursor 2 21
print 'These keys are awkward and take a while to get used to, so we will dedicate
cursor 0 22
print 'this lesson to T and Y gradually including the keys you have learnt so far.

script - waitspc

hkey f
fkey t
bkey y
bkey j
clear 16
cursor 2 16
print 'Try moving your left index finger over the T key, press it and return your
cursor 0 17
print 'finger back resting over the F key.

:wait_for_t
wait -
if key ! T if key ! t goto wait_for_t

fkey f
hkey t

cursor 2 19
print 'Good. Now press the F key.

:wait_for_f
wait -
if key ! F if key ! f goto wait_for_f

bkey t
hkey f

print ' Good.
script - waitspc

bkey f

clear 15
cursor 2 16
print 'Try moving your right index finger over the Y key, press it and move your
cursor 0 17
print 'finger back over the J key.

hkey j
fkey y

:wait_for_y
wait -
if key ! Y if key ! y goto wait_for_y

fkey j
hkey y

cursor 2 19
print 'Good. Now press the J key.

:wait_for_j
wait -
if key ! J if key ! j goto wait_for_j

bkey y
hkey j

print ' Good.
script - waitspc

clear 15
cursor 0 15
print 'Now we will try a short test using the keys F T and J Y.

cursor 19 18
print 'tttt ffff yyyy jjjj yyyy jjjj tttt ffff
cursor 0 21
print 'Remember your index fingers rest over F and J.
hkey f
hkey t
hkey y
script - waitspc
bkey f
bkey t
bkey y
bkey j
script - dotest2

cursor 19 18
print 'tttt ffff ttff ttff yyyy jjjj yyjj yyjj
script - dotest1

cursor 19 18
print 'tttt yyyy ttyy ttyy tfff jyyy ttjj yyff
script - dotest1

cursor 19 18
print 't t t t y y y y ty ty tf tf yj yj yt yt
script - dotest1

cursor 19 18
print 'tfj tfj yjf yjf yjyj tyty ftft tyty yty
script - dotest1

script - progress

clear 15
cursor 0 15
print 'Now we will add G and H.

cursor 19 18
print 'tttt gggg jjjj yyyy hhhh ffff ttgg yyhh
cursor 0 21
print 'You should only be using your index fingers to press these keys.
fkey f
hkey g
fkey t
fkey y
hkey h
fkey j
script - waitspc
bkey f
bkey g
bkey t
bkey y
bkey h
bkey j
script - dotest1

cursor 19 18
print 'ggtt hhyy ttyy jjff yytt ffjj ftyj jhgf
script - dotest1

cursor 19 18
print 'ttyy tyty ttff tftf yyjj yjyj gtty hyyt
script - dotest1

script - progress

clear 15
cursor 0 15
print 'Now we will add R and U.

cursor 9 18
print 'rrrr tttt yyyy uuuu yyyy rrrr uuuu tttt rrrr yyyy tttt uuuu
cursor 0 21
print 'Your index fingers rest over F and J when they are not being used.
fkey f
hkey r
fkey g
fkey t
fkey y
fkey h
hkey u
fkey j
script - waitspc
bkey f
bkey r
bkey g
bkey t
bkey y
bkey h
bkey u
bkey j
script - dotest2

clear 18 18
cursor 9 18
print 'rrff ttff uujj yyjj ttrr yyuu ttgg yyhh yhjy tgft tf tf yj yj
script - dotest2

clear 18 18
cursor 9 18
print 'yrhg tugg yrhh rftg ujyh tftf yjyj tfgf yjhj ruff ruff urgh
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will add the keys E D and I K.

cursor 9 18
print 'eeee dddd tttt ffff iiii kkkk yyyy jjjj eeee tttt iiii yyyy
cursor 0 21
print 'You use your middle fingers to press E D and I K.
hkey e
hkey d
fkey f
fkey r
fkey g
fkey t
fkey y
fkey h
fkey u
fkey j
hkey i
hkey k
script - waitspc
bkey e
bkey d
bkey f
bkey r
bkey g
bkey t
bkey y
bkey h
bkey u
bkey j
bkey i
bkey k
script - dotest2

clear 18 18
cursor 9 18
print 'tttt dddd yyyy eeee yyyy kkkk tttt iiii eett yydd iiyy ttkk
script - dotest2

clear 18 18
cursor 9 18
print 'ttee yyii eett iiyy yyee ttii iitt eeyy etet eyey iyiy itit
script - dotest2

clear 18 18
cursor 9 18
print 'ttdd yykk dett kiyy edtt ikyy eted iyik eyik ited tetd yiyk
script - dotest2

clear 18 18
cursor 9 18
print 'edtf ftde ikyj jyki etfd iyjk erty iuyt etgh iuhg tteg yyih
script - dotest2

clear 18 18
cursor 9 18
print 'jug guy hid keg fig key grit tyre fued hide huge greet deft
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will add the keys W S and O L.

cursor 9 18
print 'wwww ssss tttt dddd oooo llll yyyy kkkk yyyy ssss tttt llll
cursor 0 21
print 'You use your ring fingers to press W S and O L.
hkey w
hkey s
fkey e
fkey d
fkey f
fkey r
fkey g
fkey t
fkey y
fkey h
fkey u
fkey j
fkey i
fkey k
hkey o
hkey l
script - waitspc
bkey w
bkey s
bkey e
bkey d
bkey f
bkey r
bkey g
bkey t
bkey y
bkey h
bkey u
bkey j
bkey i
bkey k
bkey o
bkey l
script - dotest2

clear 18 18
cursor 9 18
print 'ssss yyyy dddd tttt wwww yyyy llll tttt kkkk yyyy oooo tttt
script - dotest2

clear 18 18
cursor 9 18
print 'wwww tttt wwtt sstt yyss yyww oooo yyyy ooyy llyy ttll ttoo
script - dotest2

clear 18 18
cursor 9 18
print 'wtst etdy oyly iykt stwy lyot ftyw gtsy jyto hylt gtgw hyho
script - dotest2

clear 18 18
cursor 9 18
print 's j t f e k i o u r d l w h s g y ; ft ls gy ri wf gw er ou
script - dotest2

clear 18 18
cursor 9 18
print 'jgh ike our ser fte sol ykj ykf swl its ttl uhu fry wed gyk
script - dotest2

clear 18 18
cursor 9 18
print 'west test jest lest lost good grill guild ghost jogger wet
script - dotest2

clear 18 18
cursor 9 18
print 'tigers like wet yuletide grey stew stirred well; they do
script - dotest2

clear 18 18
cursor 9 18
print 'outside; the wild forest gusts yowl yet quite softly
script - dotest2

script - progress

clear 15
cursor 0 15
print 'Now we will use the keys Q W E R T, Y U I O P, A S D F G and H J K L ;

cursor 9 18
print 'qqqq tttt wwww yyyy pppp yyyy oooo tttt aaaa yyyy ;;;; tttt
cursor 0 21
print 'Remember your fingers rest on the HOME keys.
fkey q
hkey a
fkey w
hkey s
fkey e
hkey d
hkey f
fkey r
fkey g
fkey t
fkey y
fkey h
fkey u
hkey j
fkey i
hkey k
fkey o
hkey l
fkey p
hkey ;
script - waitspc
bkey q
bkey a
bkey w
bkey s
bkey e
bkey d
bkey f
bkey r
bkey g
bkey t
bkey y
bkey h
bkey u
bkey j
bkey i
bkey k
bkey o
bkey l
bkey p
bkey ;
script - dotest2

clear 18 18
cursor 9 18
print 'l p k g e r t u f s q a i o j d a q s p y r g w h u g y a p
script - dotest2

clear 18 18
cursor 9 18
print 'as qa er we pl ki yj hy jt rd qf kj fy tg sw wp sh jj yi ee
script - dotest2

clear 18 18
cursor 9 18
print 'ttt fff jjj yyy ggg fff ttt www sss ttt ddd yyy rrr fff ;;;
script - dotest2

clear 18 18
cursor 9 18
print 'yyy jjj fff ttt hhh jjj yyy ooo lll yyy kkk ttt uuu jjj aaa
script - dotest2

clear 18 18
cursor 9 18
print 'qtq afa gsg tft ete rfe fga atf pfq q;f sws syq kfy ftq tfy
script - dotest2

clear 18 18
cursor 9 18
print 'pyp ;j; hlh yjy iyi uji jh; ;yj qjp paj lol ltp djt jyp yjt
script - dotest2

clear 18 18
cursor 9 18
print 'qaqpt lh;dd wyqkq yjytf uyi;p utyaq ssary yhtjj tatyg odwoy
script - dotest2

clear 18 18
cursor 9 18
print 'qaw wse edr rft tgf p;o oli iku ujy yhj phew; lots of letters
script - dotest2

clear 18 18
cursor 9 18
print 'yet quill silk stroll till goal yield graph half reap quite
script - dotest2

clear 18 18
cursor 9 18
print 'a purple hat quite high glued together with tar tied to a tree
script - dotest2

clear 18 18
cursor 9 18
print 'queasy yellow yak who tasted yew tree was later swiftly purged
script - dotest2

clear 18 18
cursor 9 18
print 'the quite fast yellow reptile jostles with the slothfull dog
script - dotest2

script - progress

script - repeat
if key = R goto repeat_lesson2
if key = r goto repeat_lesson2

memory 2 = 2

clear
cursor 51 7
print '4.
script save

if key ! C if key ! c goto exit
clear
keyboard

:exit